home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Apple WWDC 1996
/
WWDC96_1996 (CD).toast
/
Technology Materials
/
MacOS 8 Resources
/
Developer Tools
/
Mac OS 8 Interfaces & Libraries
/
Interfaces
/
AIncludes
/
ToolUtils.a
< prev
next >
Wrap
Text File
|
1996-05-01
|
4KB
|
168 lines
;
; File: ToolUtils.a
;
; Contains: Toolbox Utilities Interfaces.
;
; Version: Technology: System 7.5
; Release: Universal Interfaces 3.0d3 on Copland DR1
;
; Copyright: © 1984-1996 by Apple Computer, Inc. All rights reserved.
;
; Bugs?: If you find a problem with this file, send the file and version
; information (from above) and the problem description to:
;
; Internet: apple.bugs@applelink.apple.com
; AppleLink: APPLE.BUGS
;
;
IF &TYPE('__TOOLUTILS__') = 'UNDEFINED' THEN
__TOOLUTILS__ SET 1
IF &TYPE('__TYPES__') = 'UNDEFINED' THEN
include 'Types.a'
ENDIF
IF &TYPE('__OSUTILS__') = 'UNDEFINED' THEN
include 'OSUtils.a'
ENDIF
IF OLDROUTINELOCATIONS THEN
IF &TYPE('__FIXMATH__') = 'UNDEFINED' THEN
include 'FixMath.a'
ENDIF
IF &TYPE('__ICONS__') = 'UNDEFINED' THEN
include 'Icons.a'
ENDIF
IF &TYPE('__QUICKDRAW__') = 'UNDEFINED' THEN
include 'Quickdraw.a'
ENDIF
IF &TYPE('__TEXTUTILS__') = 'UNDEFINED' THEN
include 'TextUtils.a'
ENDIF
ENDIF
;
;------------------------------------------------------------------------------------------------------------------------------------------------------------------------
; Note:
;
; The following routines that used to be in this header file, have moved to
; more appropriate headers. If OLDROUTINELOCATIONS is 0, then you will have
; to include the headers below to use the following functions.
;
; FixMath.h: FixMul
; FixRatio
; FixRound
;
; Icons.h: GetIcon
; PlotIcon
;
; Quickdraw.h: AngleFromSlope
; DeltaPoint
; GetCursor
; GetIndPattern
; GetPattern
; GetPicture
; PackBits
; ScreenRes
; ShieldCursor
; SlopeFromAngle
; UnpackBits
;
; TextUtils.h: Munger
; GetIndString
; GetString
; NewString
; SetString
;------------------------------------------------------------------------------------------------------------------------------------------------------------------------
;
; Used only in the LongMul function.
Int64Bit RECORD 0
hiLong ds.l 1 ; offset: $0 (0)
loLong ds.l 1 ; offset: $4 (4)
sizeof EQU * ; size: $8 (8)
ENDR
IF FOR_SYSTEM7_AND_SYSTEM8_PREEMPTIVE THEN
;
; pascal Boolean BitTst(const void *bytePtr, long bitNum)
;
IF ¨ GENERATINGCFM THEN
_BitTst: OPWORD $A85D
ELSE
IMPORT_CFM_FUNCTION BitTst
ENDIF
;
; pascal void BitSet(void *bytePtr, long bitNum)
;
IF ¨ GENERATINGCFM THEN
_BitSet: OPWORD $A85E
ELSE
IMPORT_CFM_FUNCTION BitSet
ENDIF
;
; pascal void BitClr(void *bytePtr, long bitNum)
;
IF ¨ GENERATINGCFM THEN
_BitClr: OPWORD $A85F
ELSE
IMPORT_CFM_FUNCTION BitClr
ENDIF
;
; pascal long BitAnd(long value1, long value2)
;
IF ¨ GENERATINGCFM THEN
_BitAnd: OPWORD $A858
ELSE
IMPORT_CFM_FUNCTION BitAnd
ENDIF
;
; pascal long BitOr(long value1, long value2)
;
IF ¨ GENERATINGCFM THEN
_BitOr: OPWORD $A85B
ELSE
IMPORT_CFM_FUNCTION BitOr
ENDIF
;
; pascal long BitXor(long value1, long value2)
;
IF ¨ GENERATINGCFM THEN
_BitXor: OPWORD $A859
ELSE
IMPORT_CFM_FUNCTION BitXor
ENDIF
;
; pascal long BitNot(long value)
;
IF ¨ GENERATINGCFM THEN
_BitNot: OPWORD $A85A
ELSE
IMPORT_CFM_FUNCTION BitNot
ENDIF
;
; pascal long BitShift(long value, short count)
;
IF ¨ GENERATINGCFM THEN
_BitShift: OPWORD $A85C
ELSE
IMPORT_CFM_FUNCTION BitShift
ENDIF
IF GENERATING68K THEN
;
; pascal void LongMul(long a, long b, Int64Bit *result)
;
IF ¨ GENERATINGCFM THEN
_LongMul: OPWORD $A867
ELSE
IMPORT_CFM_FUNCTION LongMul
ENDIF
ENDIF
ENDIF
ENDIF ; __TOOLUTILS__